3 print" [162][146][190] [162][162][146][188][190][188][162][146] [188][162][146][188][162][146] [188][162][162][162][146] [188][190][188][162][162][162][146] [162][162][162][146] ":print" [193] s s o c i a t e d [208] i r a t e s ":print"[153] [205]embers: [195][197][205] , [208][212][195] , [205][197][203]":print"[154][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192]":print" present :"
5 print"[147][201]t took me about two months to complete":print" this program. [201] took routines from":print" differrent programs even though they":print" needed many modifications.":print"[212]he following were used :"
6 print" * [195][207][208][217][160]58.5 [203] by [211]t.[194]uehne ([198][204][193][211][200]-[195][207][208][217][146] was based on it).":print" * [198][193][211][212] [195][207][208][217] by [212]homas [212]empelmann":print" (only the serial-bus routines)":print" * [208][201][206][203][160][198][204][207][217][196] by some unknown [198][201][206][206][201][211][200]":print" person (the idea of executing a"
7 print" program in the disk drive buffer":print" with #$[197]0-command)":print" * [198][198][207][210][205][193][212] [214]1.1 from the 1541 fun club":print" who had taken it from [212][200][197] [213][206][196][197][210][199][210][207][213][206][196] [206][197][212][215][207][210][203] by [205]ike [202].[200]enry":print" * [197]specially '[212][200][197][160][193][206][193][212][207][205][217][160][207][198][160][212][200][197][160]1541 [196][201][211][203][160][196][210][201][214][197]'-book"
8 print" *** [205][193][206][217][160][212][200][193][206][203][211][160][212][207][160][193][204][204][160][193][194][207][214][197][160]***":gosub18:print"[147] * [212]echnical information *":print" * [212]he program can have max. 31 file-":print" names in memory":print" * [205]ax. file-length is 223 blocks (if":print" the file is larger than 223 blocks"
9 print" it can't be copied with [198][204][193][211][200]-[195][207][208][217][146])":gosub18:print"[147] * [200]ow to use *":print" * 12 [211][197][195][207][206][196][211] [198][207][210][205][193][212]":print" >[206][193][205][197],[201][196]< (there is no option":print" for using only >[206][193][205][197]< )":print" * [196][201][211][208][204][193][217][201][206][199][160][196][201][210][197][195][212][207][210][217]"
10 print" [196]irectory will pause from any":print" key and will abort from [210][213][206]/[211][212][207][208]":print" * [200][193][206][196][204][201][206][199][160][198][201][204][197][211]":print" * [195][207][208][217][201][206][199]":print" select files normally":print" * [211][195][210][193][212][195][200][201][206][199]":print" select files normally and after"
11 print" that select 1 or 2 (no difference":print" between them).[212]hen select the":print" scratch function '[211]'":print" * [217]ou can move directly to copying":print" (scratching) by pressing the [210][197][212][213][210][206]":print" key when selecting the files.":gosub18
12 print"[147] * [196][201][211][203][160][195][207][205][205][193][206][196][211]":print" [202]ust press 'd' and then you":print" can type the disk command in.":print" * for example:"chr$(13)" r0:shit-copy=copy59":gosub18:print"[147] * [195][200][193][206][199][197][160][211][197][195][212][207][210][160][211][212][197][208][160][211][201][218][197]":print" [208]ress 'c' and then you can change
13 [153]" sector step size with cursor keys.":[153]" * (NULL)ormal step size is 10.":[153]" (NULL)ou can make writing faster":[153]" changing step size to 14.":[153]" * peekut normal reading (floyd ex.)":[153]" will be slower.":[141]18
14 [153]"load * (NULL)otes *":[153]" * (NULL)ou can't scratch files which are":[153]" larger than 223 blocks (because":[153]" the files are selected with the":[153]" same routine as when wanted to":[153]" copy them)."
15 [153]" * (NULL)he program can use two modes in":[153]" writing. (NULL)hen (NULL)waitval(NULL)right$asc(NULL) right$(NULL) (NULL)(NULL) then":[153]" the data is verified after writing":[153]" else not. (NULL)waitval(NULL)right$asc(NULL)close(NULL)ascasccloseis though":[153]" faster.":[153]" * (NULL)he program has full control over"
16 [153]" all errors. (NULL)o it shouldn't":[153]" lock up. peekut due to speed":[153]" and memory reasons will errors":[153]" 22,(24,)27,29 be reported as 20":[141]18:[153]"load (NULL)hank you for reading this,":[153]" and also thanks to (NULL)-(NULL)(NULL)asc(NULL)"
17 [153]" for creative ideas!!":[153]" atnnd (NULL)(NULL) best (?) regards to mid$left$!!":[153]"":[141]18:::[129]e[178]0[164]60:[153]:[130]:[153]"contload"[199](34)"flash-copy*"[199](34)",8":[153]"ononon";:[128]
18 ::[153]" press any key to continue";:[151]ve,14:[129]e[178]1[164]24:[151]v,e:[158]49152:[130]:[129]e[178]25[164]1[169][171]1:[151]v,e:[158]49152:[130]